|
|
|
| |
<%
dim fid,conn,rs,strsql
fid=trim(request("fid"))
set conn=opendb()
set rs=server.CreateObject("adodb.recordset")
strsql="select * from tb_feedback where feedback_id='" & processquotes(fid) & "'"
rs.open strsql,conn,1,1
if not rs.eof then
%>
| 用户姓名： |
<%=rs("feedback_username")%> |
| 留言时间： |
<%=rs("feedback_date")%> |
| 留言类型： |
<%
if rs("feedback_kind") = "1" then
response.Write("建议")
else
response.Write("投诉")
end if
%>
|
| 留言主题： |
<%=rs("feedback_title")%> |
| 留言内容： |
<%=texttohtml(rs("feedback_content"))%> |
| 联系方式： |
<%=rs("feedback_contact")%> |
<%
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
|
|
|
|
